home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 27 / amigaformatcd27.iso / -websites- / asimware / techsupport / files / asimcdfs_extendedicons.lha / AsimCDFS_ExtendedIcons / Install-Extended Icons < prev    next >
Encoding:
Text File  |  1996-06-11  |  7.1 KB  |  229 lines
  1. ;$VER: AsimCDFS Extended Icons (10.6.96) 
  2. ;Copyright ©1996 Asimware Innovations Inc.
  3.  
  4. (onerror (
  5.     (makeassign "AsimCDFS_Dest")
  6.     (makeassign "AsimCDFS_Icons")
  7. ))
  8.  
  9.  
  10.  
  11. (makeassign "AsimCDFS_Icons" "AsimCDFS_Icons")
  12.  
  13. (set #theirlevel @user-level )
  14. (set @default-dest "AsimCDFS:")
  15.  
  16. (complete 0)
  17.  
  18.  
  19. ;  **********************************************************************
  20. ;  Tell About Extended icons
  21. ;  **********************************************************************
  22. (user 2)
  23. (message (cat    "NewIcons and MagicWB\n"
  24.                     "-------------------------\n"
  25.                     "This installation script will update your AsimCDFS utilities "
  26.                     "with our NewIcon and MagicWB icon sets.\n\n"
  27.                     "This installation script will expect the AsimCDFS utilities to " 
  28.                     "be in their default places:  ie. the AsimCDFS: directory and the "
  29.                     "AsimCDFS_Buffer: directory.  If you have manually moved the files "
  30.                     "from these places, you will also have to manually install this "
  31.                     "extended icon set.")
  32. )
  33.  
  34.  
  35. (message (cat    "ToolType Warning\n"
  36.                     "---------------------\n"
  37.                     "Please note that this installation script does not preserve any custom icon tooltypes.\n\n\n"
  38.                     "Are you sure that you would like to proceed with this installation?"
  39.                     )
  40. )
  41. (user #theirlevel)
  42.  
  43.  
  44.  
  45. ;  **********************************************************************
  46. ;  Ask for AsimCDFS:
  47. ;  **********************************************************************
  48. (set #AsimCDFS
  49.     (askdir
  50.         (prompt "Specify the directory in which the AsimCDFS support programs were placed:" )
  51.         (help "AsimCDFS contains a number of support programs.  Please specify the directory in which you previously installed these files.")
  52.         (default "AsimCDFS:")
  53.         (newpath)
  54.     )
  55. )
  56. (makeassign "AsimCDFS_Dest" #AsimCDFS)
  57.  
  58.  
  59.  
  60. ;  **********************************************************************
  61. ;  Get CD0 device
  62. ;  **********************************************************************
  63. (user 2)
  64. (set #CDDev
  65.     (askstring
  66.         (prompt "What is the AmigaDOS name of your CD-ROM drive?" )
  67.         (help "Please specify the name of your CD-ROM drive.  By default, AsimCDFS will set it to CD0:")
  68.         (default "CD0:")
  69.     )
  70. )
  71. (user #theirlevel)
  72.  
  73.  
  74.  
  75.  
  76.  
  77. ;  **********************************************************************
  78. ;  Copy over files to the ENVARC:AsimCDFS directory
  79. ;  **********************************************************************
  80. (copyfiles
  81.     (prompt "\n\nCopying extended icons to the ENVARC:AsimCDFS "
  82.               "directory.\n" )
  83.     (source "AsimCDFS_Icons:ENVARC/AsimCDFS")
  84.     (dest "ENVARC:AsimCDFS")
  85.     (infos)
  86.     (all)
  87.     (help "\n\nThis will copy over extended icon files to the ENVARC:AsimCDFS directory.")
  88.     (confirm)
  89. )
  90.  
  91.  
  92. ;  **********************************************************************
  93. ;  Copy over AsimCDFS_Prefs info
  94. ;  **********************************************************************
  95. (copyfiles
  96.     (prompt "\n\nCopying AsimCDFS_Prefs icon\n" )
  97.     (source "AsimCDFS_Icons:AsimCDFS_Prefs.info")
  98.     (dest "AsimCDFS_Dest:")
  99.     (help "\n\nThis will copy over extended icon files to your AsimCDFS directory.")
  100.     (confirm)
  101. )
  102.  
  103.  
  104. ;  **********************************************************************
  105. ;  Copy over AsimTunes info
  106. ;  **********************************************************************
  107. (copyfiles
  108.     (prompt "\n\nCopying AsimTunes icon\n" )
  109.     (source "AsimCDFS_Icons:AsimTunes.info")
  110.     (dest "AsimCDFS_Dest:")
  111.     (help "\n\nThis will copy over extended icon files to your AsimCDFS directory.")
  112.     (confirm)
  113. )
  114. (tooltype
  115.     (dest "AsimCDFS_Dest:AsimTunes")
  116.     (settooltype "CDROM" #CDDev)
  117.     (noposition)
  118. )
  119.  
  120.  
  121. ;  **********************************************************************
  122. ;  Copy over DiscChanger info
  123. ;  **********************************************************************
  124. (copyfiles
  125.     (prompt "\n\nCopying DiscChanger icon\n" )
  126.     (source "AsimCDFS_Icons:DiscChanger.info")
  127.     (dest "AsimCDFS_Dest:")
  128.     (help "\n\nThis will copy over extended icon files to your AsimCDFS directory.")
  129.     (confirm)
  130. )
  131. (tooltype
  132.     (dest "AsimCDFS_Dest:DiscChanger")
  133.     (settooltype "CDROM" #CDDev)
  134.     (noposition)
  135. )
  136.  
  137.  
  138. ;  **********************************************************************
  139. ;  Copy over SimBoot info
  140. ;  **********************************************************************
  141. (copyfiles
  142.     (prompt "\n\nCopying SimBoot icon\n" )
  143.     (source "AsimCDFS_Icons:SimBoot.info")
  144.     (dest "AsimCDFS_Dest:")
  145.     (help "\n\nThis will copy over extended icon files to your AsimCDFS directory.")
  146.     (confirm)
  147. )
  148.  
  149.  
  150. ;  **********************************************************************
  151. ;  Copy over CDTV_Prefs info
  152. ;  **********************************************************************
  153. (copyfiles
  154.     (prompt "\n\nCopying CDTV_Prefs icon\n" )
  155.     (source "AsimCDFS_Icons:CDTV_Prefs.info")
  156.     (dest "AsimCDFS_Dest:")
  157.     (help "\n\nThis will copy over extended icon files to your AsimCDFS directory.")
  158.     (confirm)
  159. )
  160.  
  161.  
  162. ;  **********************************************************************
  163. ;  Copy over CD³²_Prefs info
  164. ;  **********************************************************************
  165. (copyfiles
  166.     (prompt "\n\nCopying CD³²_Prefs icon\n" )
  167.     (source "AsimCDFS_Icons:CD³²_Prefs.info")
  168.     (dest "AsimCDFS_Dest:")
  169.     (help "\n\nThis will copy over extended icon files to your AsimCDFS directory.")
  170.     (confirm)
  171. )
  172.  
  173.  
  174.  
  175. ;  **********************************************************************
  176. ;  Delete all audio icons
  177. ;  **********************************************************************
  178. (foreach "AsimCDFS_Buffer:Audio/" "#?" (
  179.     (set #ThisDir @each-name)
  180.     (foreach (cat "AsimCDFS_Buffer:Audio/" #ThisDir) "#?"
  181.         (delete (cat "AsimCDFS_Buffer:Audio/" #ThisDir "/" @each-name)
  182.             (optional "force")
  183.             (help "\n\nThis step will delete the old icons in the AsimCDFS_Buffer:Audio directory")
  184.             (prompt "Deleting old Audio icons...")
  185.         )
  186.     )
  187. ))
  188.  
  189.  
  190.  
  191. ;  **********************************************************************
  192. ;  Delete all PhotoCD disk and drawer icons
  193. ;  **********************************************************************
  194. (foreach "AsimCDFS_Buffer:PhotoCDIcon_Buffer/" "#?" (
  195.     (set #ThisDir @each-name)
  196.     (foreach (cat "AsimCDFS_Buffer:PhotoCDIcon_Buffer/" #ThisDir) "(Disk.info|192x128.info|384x256.info|768x512.info|1536x1024.info|3072x2048.info)"
  197.         (delete (cat "AsimCDFS_Buffer:PhotoCDIcon_Buffer/" #ThisDir "/" @each-name)
  198.             (optional "force")
  199.             (help "\n\nThis step will delete the old icons in the AsimCDFS_Buffer:PhotoCDIcon_Buffer directory")
  200.             (prompt "Deleting old PhotoCD icons...")
  201.         ))
  202. ))
  203.  
  204.  
  205.  
  206. ;  **********************************************************************
  207. ;  Tell about other installation items
  208. ;  **********************************************************************
  209. (user 2)
  210. (message (cat    "Installation Complete\n"
  211.                     "-----------------------\n"
  212.                     "Your AsimCDFS utilities have now been updated with the new "
  213.                     "MagicWB and NewIcons icon sets.  Complete this installation "
  214.                     "routine, wait for a few seconds and then reboot your Amiga.  "
  215.                     "The icons will then be loaded into your system.")
  216. )
  217. (user #theirlevel)
  218.  
  219.  
  220.  
  221. ;  **********************************************************************
  222. ;  remove assign to AsimCDFS_Icons, etc.
  223. ;  **********************************************************************
  224. (makeassign "AsimCDFS_Dest")
  225. (makeassign "AsimCDFS_Icons")
  226.  
  227.  
  228. (complete 100)
  229.